      COMMON /INIREP/ NREPPI(3), IREPPI(3,3)
